home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 24 / MacFormat n. 24 (Spain) / MacFormat 24.bin / Demos / Jungle Activated! / JungleActivated Demo / jung DEMO d / 00169_Mixer- Loop Selector 8.ls < prev    next >
Encoding:
Text File  |  1996-10-14  |  472 b   |  19 lines
  1. on mouseUp
  2.   global gWhichSound10, gLastLoop
  3.   set the volume of sound 12 to 0
  4.   puppetSprite(15, 1)
  5.   if the foreColor of sprite 15 = 255 then
  6.     undoLoop()
  7.     set the foreColor of sprite 15 to 226
  8.     set gWhichSound10 to getpn() & "Sounds:Loops:Loop8.aif"
  9.     sound playFile 11, gWhichSound10
  10.     set gLastLoop to 11
  11.   else
  12.     set the foreColor of sprite 15 to 255
  13.     set gWhichSound10 to EMPTY
  14.     sound stop 11
  15.     set gLastLoop to 0
  16.   end if
  17.   updateStage()
  18. end
  19.